home *** CD-ROM | disk | FTP | other *** search
- global gHCLang
- get GetRegionCode(the long name of hypercard)
- if it is not a number then get 0
- if it=0 then put "English" into gHCLang
- else if it=1 then put "French" into gHCLang
- else if it=3 then put "German" into gHCLang
- else if it=8 then put "Spanish" into gHCLang
- else if it=4 then put "Italian" into gHCLang
- else if it=7 then put "Swedish" into gHCLang
- else if it=17 then put "Finnish" into gHCLang
- else if it=12 then put "Norwegian" into gHCLang
- else if it=9 then put "Danish" into gHCLang
- else put "English" into gHCLang